home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2000 January / january_2000.iso / Site Building / ASPEdit / _SETUP.1 / counter1.asp < prev    next >
Encoding:
Text File  |  1998-07-02  |  198 b   |  10 lines
  1. <%
  2.   ' Lock the Application object
  3.   Application.Lock
  4.   ' Increment the count
  5.     Application("Count") = Application("Count") + 1
  6.  
  7.   ' Unlock the Application object
  8.   Application.Unlock
  9. %>
  10.